% V20210224 - 8.7.13 Sortable Listview Full Example INCLUDE "GW.bas" mypage = GW_NEW_PAGE() ARRAY.LOAD veggies$[], "~Salad", "Broccoli", "Tomatoes", "Carrots", "Beans", "Eggplant" lv = GW_ADD_LISTVIEW(mypage, veggies$[]) GW_ADD_BUTTON(mypage, "Done!", "GO") GW_RENDER(mypage) % Wait for user action. r$ = GW_WAIT_ACTION$() IF r$ = "BACK" THEN END IF GW_LISTVIEW_CHANGED(lv) THEN PRINT "Original array:" DEBUG.ON DEBUG.DUMP.ARRAY veggies$[] PRINT "Re-arranged by user:" order$ = GW_GET_LISTVIEW_ORDER$(lv) PRINT "Order: " + order$ GW_REORDER_ARRAY(veggies$[], order$) DEBUG.DUMP.ARRAY veggies$[] ELSE PRINT "No change!" END IF